(*********************************************************************
* Notifier object definitions                                        *
*********************************************************************)
unit NotifyDef;

interface

uses Windows;

const tnEvent       = 0;    // Use kernel object Event (SetEvent)
      tnThreadMsg   = 1;    // Use message to thread ID (PostThreadMessage)
      tnWinMsg      = 2;    // Use message to window HWND (PostMessage)
      tnCallBack    = 3;    // Asynchronous call user function TNotifierProc
      tnCallEvent   = 4;    // Asynchronous call object event handler TNotifierEvent

type TNotifierProc = procedure(Owner: THandle; Msg,UserParam : dword);
     TNotifierEvent = procedure(Sender : TObject; Msg,UserParam : dword) of object;

implementation
end.


